Comparação da amostra IMOB para o universo AML
imob.RmdIMOB is representative at zone level, which are groups of Freguesias that have homogeneity in accessibility to public transport, and for each Municipality.
The methodology of IMOB defines 5 different zone levels, resulting in 49 zones, within the 18 Municipalities.
According to Census 2021, the population in the Lisbon Metropolotan Area (LMA) was 2871k, and the number of trips extrapolated from the IMOB 2017 was 5300k.
IMOBvalid_freg = IMOBvalid_freg %>% mutate(TRIPS_pop = Total/Populacao, Car_pop = (Car + CarP)/Populacao)
IMOBvalid_zones = IMOBvalid_zones %>% mutate(TRIPS_pop = Total/Populacao, Car_pop = (Car + CarP)/Populacao)
summary(IMOBvalid_freg$TRIPS_pop)
#> Min. 1st Qu. Median Mean 3rd Qu. Max.
#> 0.4618 1.3544 1.6788 1.8627 2.1421 5.8204
summary(IMOBvalid_zones$TRIPS_pop)
#> Min. 1st Qu. Median Mean 3rd Qu. Max.
#> 0.9983 1.5048 1.7458 1.7504 1.9191 3.6476
summary(IMOBvalid_freg$Car_pop)
#> Min. 1st Qu. Median Mean 3rd Qu. Max.
#> 0.2867 0.8225 1.0530 1.0894 1.2889 2.7822
summary(IMOBvalid_zones$Car_pop)
#> Min. 1st Qu. Median Mean 3rd Qu. Max.
#> 0.6708 0.9111 1.0629 1.0667 1.2405 1.5930
modelfreg = lm(data= IMOBvalid_freg, Total ~ Populacao)
plot(IMOBvalid_freg$Populacao, IMOBvalid_freg$Total) + abline(modelfreg, col = "red")
#> integer(0)
plot(IMOBvalid_freg$TRIPS_pop) + abline(h = mean(IMOBvalid_freg$TRIPS_pop), col = "red")

#> integer(0)
modelzones = lm(data= IMOBvalid_zones, Total ~ Populacao)
plot(IMOBvalid_zones$Populacao, IMOBvalid_zones$Total) + abline(modelzones, col = "blue")

#> integer(0)
plot(IMOBvalid_zones$TRIPS_pop) + abline(h = mean(IMOBvalid_zones$TRIPS_pop), col = "blue")

#> integer(0)
plot(modelfreg)




plot(modelzones)



The error accepted by IMOB methodology (p.12) is as follows:
| popupacao_municipio | error |
|---|---|
| < 50k | 5 pp |
| 50-100k | 4 pp |
| 100-200k | 3 pp |
| >= 200k | 2 pp |